

sr     = 44100
ksmps  = 4410
nchnls = 2
0dbfs  = 1


;; crunch - small rhythmic click
instr 1
  iamp     = p4
  idamp    = p5
  asig    crunch iamp, 0.1, 7, idamp
          out asig

endin


;; wgbowedbar
instr 2
; pos      =         [0, 1]
; bowpress =         [1, 10]
; gain     =         [0.8, 1]
; intr     =         [0,1]
; trackvel =         [0, 1]
; bowpos   =         [0, 1]

  idur    = p3
  iamp    = p4
  ipch    = p5
  iconst  = p6
  kb      line 0.5, idur, 0.1
  kp      line 0.6, idur, 0.7
  kc      line 1, p3, 1

  a1      wgbowedbar iamp, ipch, kb, kp, 0.995, iconst, 0
          out a1
endin

